(ns com.endpoint
(:require com.module.cljsh))


(defn -main [args]

(if (= 0 (compare args "mem"))
        ((com.module.cljsh/exec ["free" "-m"])
		(System/exit 0))
)
(if (= 0 (compare args "disk"))
        ((com.module.cljsh/exec ["df" "-k"])
		(System/exit 0))
)
(if (= 0 (compare args "cpu"))
        ((com.module.cljsh/exec ["cat" "/proc/stat"])
		(System/exit 0))
)
(println "Usage: Sorry, input parameter should be mem/disk/cpu ")


 (System/exit 0)
)


